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; FACILITY: SYSTST (SATS SYSTEM SERVICE TESTS) 
; ABSTRACT: 
THIS MODULE CONTAINS Hee ttt te WHICH, WHEN LINKED 
WITH SUCCOMMON.OBJ, FORM TEST MODULE SATSSS70 TO TEST SUCCESSFUL 
OPERATION OF THE SEXPREG SYSTEM SERVICE. THE SERVICE IS INVOKED 
UNDER VARIOUS INPUT CONDITIONS WITH VA G INPUT PARAMETERS. ONL 
SUCCESSFUL STATUS CODES ARE Cen ae IN THIS TEST MODULE. CORRECT 
OPERATION OF i. gs FOR yar OF ITS _ISSUANCES IS VERIFIED BY 
RMAL STATUS CODE, EXPECTED RETURN ARGUMENTS 


; ENVIRONMENT: USER MODE IMAGE; NEEDS CMKRNL PRIVILEGE, 
; DYNAMICALLY ACQUIRES OTHER PRIVILEGES, AS NEEDED. 


; AUTHOR: THOMAS L. CAFARELLA, CREATION DATE: JUN, 1977 
; MODIFIED BY: 
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“SEP-19 
wea oRD, WRT ,NOEXE, LONG 


ADDR OF PR 
INDICATOR 
HOLD AREA 
LONGWORD P 
LONGWORD P 
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ASK (IN PHD) 

“ZERO ERROR 
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JECT EXPREG 
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: ; .SBTTL CONDITION TABLES 
0; teete CONDITION TABLES FOR EXPREG SYSTEM SERVICE *eeee 
: COND  1,LONG,<REGION>,- 
<PROGRAM>, = 


<CONTROL>,= 


- LONG 0 ; PROGRAM 
» LONG 1 ; CONTROL 


COND 2. Le coi. - 
L_COUNT> 


SREDIUM COUNTS, + 
<LARGE COUNT>,=- 


sae a 
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° 1 
~ LONG 5 
° 1000 
COND JoLONS <ACMODE>,-=- 
<KERNEL>,=- 
<EXEC>,= 
<SUPER>, = 
<USER>,=- 
~ LONG Pstsee KERNEL 


PSL x 
- LONG PSLSC_SUPER 
- LONG PSLSC_USER 


COND 4,NULL 
COND 5 .NULL 
-PSECT SATSSS70,RD,WRT.EXE 
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; ~SBTTL TM SETUP, TM CLEANUP 
FUNCTIONAL DESCRIPTION: 
nunc nouse SELL AM LEMMAS RESEETIOEY, o 
TEST MODULE EXECUTION. 
CALLING SEQUENCE: 

BSBW TM_SETUP BSBW TM_CLEANUP 
INPUT PARAMETERS: 

NONE 
IMPLICIT INPUTS: 

NONE 
OUTPUT PARAMETERS: 

NONE 
IMPLICIT OUTPUTS: 


SATSS$70 SATS 
¥04=000 TM_SE 
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od a ts — st ss —s — — — 9 — —) — — 2 — — — 9 bs —— — = —> bs — >) — 4s bs as a ss a a a a os 3s 2 a a ss 2 a ts 2 en 


0 TM_SETUP: COND TABLE INDEX REGISTERS (R2.3,4.5,6) CLEARED; 
0 ALL PRIVILEGES ACQUIRED. 
0 COMPLETION CODES: 
0 EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 
o SIDE EFFECTS: 
0 SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 
0 (VIA RSB) IF ERROR ENCOUNTERED. 
0 oo 
0 
0 
0 
0 TM_SETUP: : 
52D CLRL RG ; INITIALIZE 
53a CLRL OR > .. CONDITION 
54 OA CLRL ORG t lee. TABLE 
554 CLRL ORS Suan INDEX 
5, 04 CLRL = R6 to tesecess REGISTERS 
FFF3" 30 BSBW  MOD_MSG_PRINT : PRINT TEST MODULE BEGIN MSG 
O°EF 90000000°EF = MOVAL TEST_MOB_SUCC,TMD_ADDR : ASSUME END MSG WILL SHOW SUCCESS 
$3. bo 90000000 ‘BF , INSV  #SUCTESS7#O,#$,MOB_MSG_CODE ; ADJUST STATUS CODE FOR SUCCESS 
MODE 10,5$,KRNL ; KERNEL MODE TO ACCESS PHD 
59 00000000'9F D0 MOVL aaCTL$GL_PHD.R9 : GET PROCESS HEADER ADDRESS 
00000000°EF 69 ODE MOVAL PHDSG_PRIVMSK(R9) PRIVMASK ; GET PRIV MASK ADDRESS 
MODE FROM 5S ; BACK TO'USER MODE 


PRIV ADD, ; GET ALL PRIVILEGES 
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g COND3_ CLEANUP: : 
RSB 
COND4:: 
0 COND4_ CLEANUP: : 


74 CONDS_ CLEANUP: : 
RSB 
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; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
; RETURN TO MAIN ROUTINE 
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.SBTTL FORM_CONDS 

FUNCTIONAL DESCRIPTION: 


FORM CONDS FORMATS AND PRI 
THE CURRENT ELEMENT IN EACH OF THE CONDIT 


CALLING SEQUENCE: 
BSBW FORM_CONDS 
INPUT PARAMETERS: 


FORM_CONDS: : 
$FAO_S 


MSG1_INP_CTL,FAO_LEN,FAO_D 
BSBW OUTPUT_MSG : 
CMPB = COND 1"C, ANULL ; 
BNEQU : 
BRW FORM_CONDSX : 
108: ov. COM 
MOVL COND1 <TABER2S ms. B ; 


PIN AAAPPIPONIPININININIDS 3 3 9 9 * FOO OODOOOOCOO OOO OOO 0 OO OW 0000 0000000000 SII 
WR @ OOD NA NE AN 9 OOD NIA MEW HO OD NAN E WIN 9 OD NAME WN 0 ONO EW OOOn 


MOVB x 
MOV_VAL cont et * 3 tONDT _ECR2],.MSG ba 


$f Yet eee 


Macr Pa 10 
UETPSY. SRC] HR 


SAYSSSoO.MAR:1 


wt ; NFORMATION ABOUT 


INF OR 
ON TABLES. 


; NONE 

: IMPLICIT INPUTS: 

: R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 
: FOR COND TABLES 1,2,3,4,5, RESPECTIVELY. 

PY FOR x = 1 2,345 : 

; CONDX. T= TITLE TEXT FOR CONDX TABLE 

: CONDX"TAB = ELEMENT TEXT FOR CONDX TABLE 

: CONDX7C = CONTEXT OF THE CONDX TABLE 

: CONDX7E = DATA ELEMENTS OF THE CONDX TABLE 
: OUTPUT PARAMETERS: 

; NONE 

: IMPLICIT OUTPUTS: 

; NONE 

> COMPLETION CODES: 

: NONE 

: SIDE EFFECTS: 

: NONE 


ESC, TESTNUM 

FORMAT CONDITIONS HEADER MSG 

+2» AND PRINT I 

1S CONDITION 1 NULL ? 

NO == CONTINUE 

YES == SUBROUTINE IS FINISHED 

SAVE ADDRESS OF CONDITION 1 TITLE FOR FAO 
SAVE ADDR OF COND 1 CURR TEXT ELT FOR FAO 
SAVE CONDITION 1 CONTEXT FOR FA 

TA1 ; GIVE COND 1 DATA VALUE TO FAO 
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9042000 FORM_CONDS ” SEP=1984 ae 99:38 LOE TP SY eRe IGAYSSS TOMAR: 1 . 
FEg2" 30 168 4 BSBW WRITE MSG2 ; FORMAT AND WRITE CONDITION 1 MSG 
14 0 1g 5 CMPB ND2_C,#NULL : IS CONDITION 2 NULL ? 
3 1 1 : BNEQU : + NO == CONTINU 
OOAE 7 a FORM_CONDSX + YES == SUBROUTINE IS FINISHED 
QOODOOOO'EF  QOOO0049"EF DE 0176 MOVAL COND2_T,MSG_A ; SAVE ADDRESS OF CONDITION 2 TITLE FOR 
00000000' EF 90000051 "EFAS Of 181 340 MOVL COND “Theta MSG_B ; SAVE ADDR OF COND 2 CURR TEXT ELT FOR 
Q0000000'EF 04 90 018D 341 MOVB aconp2 C,MSG_CTXT SAVE CONDITION 2 CONTEXT FOR FAO 
194 4g MOV_VAL C t COND? EtR3), MSG_ BATA: GIVE COND 2 DATA VALUE TO FAO 
FESD' 30 1Ag 4 BSBQ WRITEMS : FORMAT AND WRITE CONDITION 2 MSG 
16 046 91 OIA 44 CMPB ss #COND3_C,,#NULL + IS CONDITION 3 NULL ? 
95 1 1A 45 BNEQU 30$ ; NO == CONTINUE 
00 3 1A 46 os BRW FORM_CONDSX : YES == SUBROUTINE IS FINISHED 
QO000000'EF  O000008E'EF DE 1AB 48 MOVAL COND3_T,M ss ; SAVE ADDRESS OF CONDITION 3 TITLE FOR 
00000000'EF  00000096'EF44 00 018 4 MOVL COND sie Ra] MSG B ; SAVE ADDR OF COND 3 CUR TEXT ELT FOR 
00000000'EF 04 90 OIC 50 MOVE Eono8 G_¢Tx SAVE CONDITION 3 content AO 
1¢ 51 MOV_VAL COND3_€ C EONDS_ tps. MSG_ BATA: GIVE COND 3 DATA VALUE TO FAO 
FE28° 30 0105 3g BSBQ ; FOR RMAT AND WRITE CONDITION MSG 
16 146 91 01D8 35 CMPB SCONBS. C,#NULL ; 1S CONDITION 4 NULL? 
47 13 O1DB «354 BEQLU FORM_COND ; YES == SUBROUTINE IS FINISHED 
Q0000000°EF  O00000CD'EF DE O1DD 355 MOVAL CONDZ_T ate A + SAVE ADDRESS OF CONDITION 4 TITLE FOR 
00000000'EF  O00000CD'EF4S 00 O168 356 MOVL CONDS TAB R51_MSG_ B : SA VE ADDR OF COND 4 CURR TEXT ELT FOR 
00000000'EF 14 90 O1F4 357 MOVB #CONDE €TXT VE CONDITION 4 CONTEXT FOR FAO 
O1FB 358 MOV_VAL COND4_C at rit _ECRS),MSG_ BATAL GIVE COND 4 DATA VALUE TO FAO 
FEO2" 30 O1FB 59 BSBO ort ° ; FORMAT AND WRITE CONDITION 4 MSG 
164 146 91 O1FE 360 CMPB =: #CONDS_C, #NULL + IS CONDITION 5 NULL ? 
21. 13 0201 361 BEQLU FORM_CONOSX ; YES == SUBROUTINE IS FINISHED 
Q0000000'EF  OO0000CE'EF DE 0203 6¢ MOVAL CONDS_T sens ; SAVE ADDRESS OF CONDITION 5 TITLE FOR 
0000000°EF OO0000CE'EF46 D0 O20E 36 MOVL COND 3-ThB R51] MSG B ; SAVE ADDR OF COND 5 CURR TEXT ELT FOR 
Q00000000'EF 14 90 O21A 364 MOVB CONDS_C,M SAVE 0 NDITION 5 CONTEXT FOR FAO 
0 4 65 MOV VAL ¢ OND» 70 cONDS etR62. MSG_ BATA GIVE COND 5 DATA VALUE TO FAO 
FDDC' 30 0221 366 BSB ITE~MSG2 : FORMAT AND ORITE CONDITION 5 MSG 
0394 67 FORM_CONDSX: 
05 0224 368 RSB : RETURN TO CALLER 
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SATSSS70 SATS SYSTEM SERVICE TESTS SEXPREE leuce 16-SEP-19 AX/VMS © V04- age 13 SA 
y042000 VERIFY oe es 9 gf: 99: $8 UETPSY.S Ree aioesop mans 1 . (1) vO 
? 7 i-- 
; 
4 9 VERIFY:: 
00000000" EF 3 4 j TSTB FLAG ; SHOULD CONDITIONS BE PRINTED ? 
\ B 4 BEQL ; NO -=- CONT 
FEE 0 D 4 4 -. BSBU  FORM_CONDS ; YES <= FMT & PRINT ALL CONDS FOR THIS T.C. 
5A 00000051'EF D Q 436 ‘ OVL ee a ZE,R10 3; GET oe A E pure R10 FOR LATER USE 
58 OFF Er 9 437 CVTBL a8 ; st NTO R8 
00000041" EF &e D 4 : TSTL EGLONERZ : i$" iT “PROGRAM TReeloN ? 
06 1 y+ ae | BEQL ; YES -- LEAVE REGS ALONE 
SA 6SA CCE «C0244 440 MNEGL R10,R10 ; GET NEGATIVE PAGE SIZE 
58 58) «CCE «COO 47 44) se MNEGL R8,R8 t ... AND MAKE R8 = 
0 ‘A oes , MODE  10,20$,KRNL : TO KERNEL FOR EXPREG 
0 60 445 ; teeeee SYSTEM SERVICE CALL WHICH IS THE SUBJECT OF THIS TEST CASE teeeee 
0 6p 109 : SEXPREG_S PAGCNTCR3],RETADR,ACMODECR4],REGIONCR2] 
O28F 448 MODE ROM, 20 : 8 kK TO USER 
00000000'8F 50 01 0290 449 CMPL RO, #SS$_NORMAL : CODE RECEIVED = CODE EXPECTED ? 
03 12 0297 450 BNEQU 30% > NO == GO PROCESS ERROR 
0061 31 8 +4 $35 30$ BRW 558 ; YES -- MORE VERIFYING 
00000000"EF  00000000'8F 0 6 9¢ re ; MOVL #SS$_NORMAL,EXPV ; LOAD UP EXPECTED AND 
OO0000000'EF 50 00 A 454 MOVL RO,RECV RECEIVED VALUES, THEN EXIT 
OgAE 439 pont ERR_EXIT LONG. INCORRECT STATUS tobe’ RETURNED FROM EXPREG> 
59 Q0000009"EF42 D0 6 FD = 457 , MOVL INITLALADRER2J, RO : GET START OF FREE AREA 
00000011'EF 59 01 0305 458 CMPL R9,RETADR ; DID EXPREG RETURN EXPECTED START ADDR ? 
560 «13=«030C:~=s 459 BEQLU 608 ; YES == GO 0 
0OOO000O'EF 59 Dd 0308 460 MOVL R9,EXPV : NO -- “LOAD UP EXPECTED AND 
00000000'EF  00000011'EF D0 31 461 RETADR,RECV RECEIVED VALUES, THEN EXIT 
0320 46¢ ERR EXIT LONG < INCORRECT stanTing PAGE ADDRESS> 
a Me nial fi iil NOW CHECK ENDING ADDRESS 
[ Sy Sy” mane 7 = ; NOW CHECK ENDING ADDRESS 
| [ pense aacaae aaa eta — 463 603: intent eesien asi » NOW C 
NDING ADDRESS i [ eer EE an 
; ; NOW CHECK ENDING ADDRESS i | [ Te a 
tea eda es, 3; NOW CHECK ENDING ADDRESS 4 | [ sas? ° deans 
_ TTS 0508-483 BUS pane Heong ; NOW CHECK ENDING ADDRESS 4 
ct. bee te  . WUEOR: “86s. OURe ie ; NOW CHECK ENDING ADDRESS | | 
r a ta en ee ES BARE SAG RR RUSE hy onlnnae poe ey ; NOW CHECK ENDING ADDRESS 
r 5 ee ee ~~ 504 ~~ 483° B03: 7 sigeae 34 ; NOW CHECK ENDIN 
SS cate Rae -. U5S04 ~~ 463 B03: au 
; NOW CHECK ENDING ADDRESS | Be a geenen pment sx, See SRB oe 
eer a ; NOW CHECK ENDING ADDRESS : | EE Se ee 
64 ~~ 463 BUS: > NOW CHECK ENDING ADDRESS 
75 ye c : US64" 4635-6082": > NOW CHECK ENC YRES 
ee srt ey | 6% 653 7 NO f SHEE 


SATSSS70 SATS SYSTEM SERVICE TESTS SEXPREC tGuec 16=SEP=1 AX/VMS Macro V04- Page 14 
$042000 VERIFY g- Hits 8}: 99: 8 UETPSY.S Bae stay ees oO. MAR: 1 ve @ 

434 484 758: 

9 95 0434 485 TSTB = (RO) ; FIRST BYTE OF PAGE = ZERO, AS PROMISED ? 

9 12 04 6 4 : BNEQ 80$ ; NO == GO INDICATE NON-ZERO ERROR 

69 00000000" EF 90 04 4 MOVB ONES, (R9) : DO A STORE == NO ACCVIO EXPECTED 
eR 43 4 8 on BRB 0 : GO LOOK AT NEXT PAGE 
00000008'EF  QO000000'EF 90 0441 490 |  #MOVB  ONES.NZERR ; INDICATE NON-ZERO ERROR FOUND 
00000000" EF 34 44C 491 CLRBsEXPV : LOAD UP EXPECTED AN 
Q00000000'EF 69 90 045 49¢ MOVB = (R9) ,RECV : RECEIVED VALUES, THEN EXIT 
OA 11 439 493 vee BRB 100$ : GO PROCESS ERROR 
FFCF 59 SA Q000001S'EF F1 iss 499 ‘oat ACBL _—RETADR#4,R10,R9,75$ ; INCR (OR DECR) TO NEXT PAGE & LOOP 
03 O00000BD'EFS4 D1 0465 497 "  CMPL —-s ACMODELR4],#PSLSC_USER ; USER MODE ? 

01 13 0460 498 BEQLU 1108 : YES == DON'T CHANGE MODE 

O46 499 wees ODE FROM,63$ > CHANGE MODE BACK TO USER 
00000008 "EF 3 Beee 26 TSTB a ; WAS A rangi ERROR ENCOUNTERED ? 

4D 1 476 208 BEQL VERIFY NO == ALL FINISHED 
047 0 ERR’ “EXIT BYTE, eA PAGE IN THE EXPANSION AREA IS NON-ZERO> 
04€5 504 VERIFYX: 

05 04¢5 505 RSB ; RETURN TO CALLER 
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SATSSS70 SATS SYSTEM SERVICE TESTS SEXPREG (SUCC 16-SEP-1984 01:00:48 VAX/VMS Macro V04- Page 15 SA 
v04=000 VF Y_CLEANUP mie 7 87 99:88 LOE TP SY. eRe TSAYSSS70.MARE1 ve WD vo 

ifs i = .SBTTL VFY_CLEANUP 

te 09 ; FUNCTIONAL DESCRIPTION: 

tee 11: VFY_CLEANUP EXECUTES SYSTEM SERVICES TO UNDO THE 
4C6 512 : EFFECT OF THOSE ISSUED IN THE VERIFY SUBROUTINE. VFY CLEANUP MUST 
4C6 513 ; ASSUME THAT VERIFY MAY NOT HAVE EXECUTED IN ITS ENTIRETY (IF AN 
4C6 514 ; ERROR IS FOUND). ALSO, VFY CLEANUP MAY ISSUE SS_CHECK OR ERR_EXIT 
4C6 515 ; ONLY AFTER PERFORMING ALL OF ITS CLEANUP OPERATIONS; THIS IS~REQUIRED 
4C6 1 ; IN THE EVENT THAT VFY_CLEANUP IS CALLED DURING ERROR PROCESSING, 
4C6 517 ; WHEN PERFORMING THE REQUIRED CLEANUP IS MORE IMPORTANT THAN 

b4C6 218 : POSSIBLY DISCOVERING A SECOND ERROR. 

046 ; 0 : CALLING SEQUENCE: 

dace ¢ 3 BSBW VFY_CLEANUP 

04€6 525; 

04€6 524 : INPUT PARAMETERS: 

0406 525 ; 

0406 526; NONE 

04€6 527; 

O4¢6 3 : : IMPLICIT INPUTS: 

0466 530: R2,3,4,5,6 CONTAIN CURRENT CONDITION TABLE INDEX VALUES 

0466 531: FOR COND TABLES 1,2,3,4,5, RESPECTIVELY. 

0466 33¢ : FOR X = 1,2,3,4,5 : 

0466 533: CONDX’E’= ADDRESS OF TABLE OF DATA VALUES FOR CONDX 

0466 234 : TABCE. IF THE CONTEXT OF TABLE X IS A SYSTEM SERVICE 

0406 535: ARGUMENT, THE ARGUMENT NAME MAY BE USED AS A SYNONYM 

0466 536: FOR CONDX_E. 

0466 537: 

04C6 538 : OUTPUT PARAMETERS: 

0406 539: 

0466 540: NCNE 

04C6 ee) 3 

0466 4@ : IMPLICIT OUTPUTS: 

04€6 543; 

0466 544: NONE 

0466 545: 

04€6 546 : COMPLETION CODES: 

0406 547; 

04C6 248 ; EFLAG SET TO NON-ZERO IF ERROR ENCOUNTERED. 

04¢6 H : SIDE EFFECTS: 

0466 3 ; SS_CHECK AND ERR_EXIT MACROS CAUSE PREMATURE EXIT 

46 «553 : (VIA RSB) IF ERROR ENCOUNTERED. 

4C6 54; 

bere | gaat 

0466 3$ 

0466 38 

4C6 59 VFY_CLEANUP: : 

00000019"EF  00000011"EF 7D 04€6 560 MOVQ = RETADR, INADR_DVA : PAGE RANGE TO DELETE 

401 361 MODE 10, 10$.k ; INTO KERNEL FOR DELTVA 
4F4 >: SDELTVA_S [NADR=INADR_DVA, = 

4F4 = 56 ACMODE=ACMODECR4) : GET RID OF ACQUIRED SPACE 
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SATSSS70 SAT 
v04=000 VFY_C UETPSY.SRCISATSS 


'wm 


SY 
LE 
Q50A 64 MODE FROM, 10$ ; BACK TO USER MODE 
05 8 65 SS_CHECK NORMAL ; CHECK FOR NORMAL RETURN FROM DELTVA 
8 ; ¢ 7. ; RETURN TO CALLER 


SATSSS70 
Symbol table 


SSSCOND_A 
SSSSTRINGS 
Seog RINGSE 


COND1_C 
COND1_ CLEANUP 
COND1 


OND4_ 

COND4~ CLEANUP 
COND4—H 
COND4~ 

COND4 "TAB 
COND 
COND5_C 
COND5” CLEANUP 
COND5—H 


COOQCOoooooooooo 


c 
: 
a 


00000001 


RRERRKER 
RREKKEEK 
ReeKKeRE 
RREKKEEK 


0000010D 


9 FOU *WO kus 


% 
a 
ee 
& 
ES 
® 
ca 
me 


00000010 


greekkene 
geaetrranre 
gereraenre 
grertkeee 
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04 


04 


oooo OOCOOoOOoO SOOOOSo COOOCOSoSOoO BOCOCOoOO CDOCOO 
SEE PE FWA SWE SWE EAE OP 


ar 


ucc 35 


ON 
OUTPUT_MSG 
PAGCNT 
PAGESIZE 
PHD$Q_PRIVMSK 
VMASK 


RE 

REGION 
REST_REGS 
RETABR 
SAVE_REGS 
SS$_RORMAL 
SUCTESS 
SYSSCMEXEC 
SYSSCMKRNL 
SYSSDELTVA 


payo8d 4:95; 


Sunil owen -—™ 


OOoOOOoOoOoOOoOO UNS 
SoOoOOCOOCOOCOCOOoOoO owca 
SSLoSSVee 
COOOOooOoo 
SOoOOCOOoOOCOoOO m= 
oof foon— cr 
Oomooo—-ht—— oo Mm x 


teerenet 
eeeeeeee 
0000019 
0000039 


REKHERE 
RRRERERE 
REARRRARKE 
REARHAEE 


00000000 
00000014 
00000008 


RAARRARKK 
RREKKREE 


00000082 
00000051 
REEKKEEE 
00000000 
00000000 
00000002 
RAREAKEEE 
00000001 
00000000 


00000008 


RERKREEE 


00000041 


RAAKEREE 
00000011 
REEKREEE 
RRA 
RRERKEEE 
Raeeeeeee 
EeeREKEE 
ReEeeeeee 
Reeeeenre 
Reeeeeee 
ReEREEEE 
EeREEERE 
Seeeeeee 
RERAeeee 
00000000 
00000009 


greener 
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na 
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VFY_ CLEANUP 0 RG 04 
YORD = $000 0008 "6 
WRITE_MSG2 teeereee 04 
bowen meee anane wome > 
! :_Psect synopsis : 
PSECT name Allocation PSECT No. Attributes 
» BS « 00000000 ( 0.) 00 ¢ O.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
SABSS$ BRB R OTS ( 9-3 4 ( 1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
RODATA 0 . wise § ( 6-3 NOPIC USR CON REL LCL NOSHR NOEXE RD NOWRT NOVEC LONG 
RWDATA Bobo a Sa ( te 03 ¢ -) NOPIC USR CON’ REL LCL NOSHR NOEXE RD WRT NOVEC LONG 
SATSSS70 QOOO005SA ( 1338.) 04 ¢ 4.) NOPIC USR CON’ REL LCL NOSHR EXE RD WRT NOVEC BYTE 
(Re a me Ge Se SD ee we ee ws ee ee ee + 
! ; Performance indicators ! 
Phase Page faults CPU Time Elapsed Time 
Initialization 36 00:00:00.09 00:00:00.34 
pounens processing 135 00:00:00.61 See Be EG 
276 00:00:08.14 00:00:19.00 
Synbol table sort 0 00:00:00.68 00:00:01.52 
s 2 121 00:00:02.01 00:00:04.56 
coekel table output 14 00:00:00.10 a8 Shs 8 9 
Psect synopsis output 2 00:00:00.02 88:80:00. 6 
Cross-reference output 0 00:00:00.00 0:00:00.00 
Assembler run totals 586 00:00:11.65 00:00:28.66 


Toe working set Limit was 1500 pages. 

42361 bytes (83 pages) of virtual memory were used to eytier rhe intermediate code 

There were 30 pages of symbol table space allocated to hold 453 non-local and aa local symbols. 
567 source Lines were read in Pass 1, producing 24 object records in Pass 2. 

39 pages of virtual memory were used to define 30 macros. 


Macro Library name Macros defined 
$255$DUA g: Rape te -MLB;1 


$255$DUA B;1 
$522 SDUADB: SYSL IBISTARLET. MLB; 2 


TOTALS (all Libraries) d 
801 GETS were required to define 27 macros. 

There were no errors, warnings or information message*. 
MACRO/LIS=L1IS$:SATSSS70/0BJ=OBJ$:SATSSS70 MSRC$:SATSSS70/UPDATE=(ENHS: SATSSS70) +EXECMLS$/LIB*+SHRLIBS:UETP/LIB 


